home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 4 / Meeting Pearls Vol. IV (1996)(GTI - Schatztruhe)[!].iso / sys / s / Meeting-Startdown < prev    next >
Text File  |  1996-09-10  |  1KB  |  51 lines
  1. .bra {
  2. .ket }
  3.  
  4. Assign >NIL: EXISTS MeetingPearls4:
  5. IF NOT WARN
  6.     Assign C:        MeetingPearls4:C                    REMOVE
  7.     Assign DEVS:    MeetingPearls4:SYS/Devs            REMOVE
  8.     Assign FONTS:    MeetingPearls4:SYS/Fonts        REMOVE
  9.     Assign HELP:    MeetingPearls4:SYS/Help            REMOVE
  10.     Assign L:        MeetingPearls4:SYS/L                REMOVE
  11.     Assign LIBS:    MeetingPearls4:SYS/Libs            REMOVE
  12.     Assign LIBS:    MeetingPearls4:SYS/Classes        REMOVE
  13.     Assign LOCALE:    MeetingPearls4:SYS/Locale        REMOVE
  14.     Assign REXX:    MeetingPearls4:SYS/Rexx            REMOVE
  15.     Assign S:        MeetingPearls4:SYS/S                REMOVE
  16.  
  17.     Execute :SYS/S/AssignMUIRemove
  18.  
  19.     Assign >T:MPTMPASSIGNVAL EXISTS TeX:
  20.     Run >NIL: :C/NessyOpenLib pattern.library
  21.     :C/pgrep >NIL: :Pearls/texmf T:MPTMPASSIGNVAL
  22.     IF NOT WARN
  23.         Assign TeX:    MeetingPearls4:Pearls/texmf    REMOVE
  24.     ENDIF
  25.     :C/NessyCloseLib pattern.library
  26.     Delete QUIET T:MPTMPASSIGNVAL
  27.  
  28.     Assign MeetingPearls4:
  29.  
  30.     IF EXISTS ENV:Language
  31.         IF $Language EQ "deutsch"
  32.             Echo "Es wurden alle Assigns entfernt."
  33.         ELSE
  34.             Echo "All assigns have been removed."
  35.         ENDIF
  36.     ELSE
  37.         Echo "All assigns have been removed."
  38.     ENDIF
  39.  
  40. ELSE
  41.     IF EXISTS ENV:Language
  42.         IF $Language EQ "deutsch"
  43.             Echo "Es gab gar keine zu entfernenden Assigns."
  44.         ELSE
  45.             Echo "There were no assigns which had to be removed."
  46.         ENDIF
  47.     ELSE
  48.         Echo "There were no assigns which had to be removed."
  49.     ENDIF
  50. ENDIF
  51.